Public Class DatosPersonales
    Dim ADDatPer As New ADCono.DatosPersonales

    Public Function GenerarDatPer(ByVal CodRS, ByVal NomApe, ByVal FecDeNac, ByVal CUI, ByVal Rel, ByVal Doc)
        Dim DS As New DataSet
        DS = ADDatPer.GnerarDatPer(CodRS, NomApe, FecDeNac, CUI, Rel, Doc)
        Return DS
    End Function
End Class
